home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 4 / MacMania 4.toast / / Demo's / Igor Demo Pro / 3 PutContentsIn Igor Pro Folder / Technical Notes / Igor Tech Notes / TN007 Multi-variate fits / Multi-variate fit Folder / procedure < prev    next >
Text File  |  1990-05-15  |  244b  |  15 lines
  1. Function foofunc(w,p)
  2.     wave w
  3.     variable p
  4.  
  5.     variable t= w[0]*x1[p] + w[1]*x2[p]
  6.     return t + w[2]*x3[p]
  7. End
  8.  
  9.  
  10. Macro RunDemo()
  11.     fooparam={2,3,0.2}
  12.     ydata_fit= foofunc(fooparam,P)
  13.     Sleep 00:00:02
  14.     FuncFit/Q foofunc fooparam ydata /D=ydata_fit 
  15. End